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1q K asr dO, dO move.4f (rO) +, d4 :d5 :d6 :d7 move.4f (rl) ,d8 :d9 :dlO :dll 

H — * mac d6,d8.d0 mpy d4,d8,dl move.4f (rO) , dl2 :dl3 :dl4 :dl5 

7,4 — s> mac d7,d9.d0 mac d5,d9,dl mpy dl4,d!0,d2 mpy dl2,dl0,d3 

lb — * mac dl5,dll,d2 mac d!3,dll,d3 add dO,dO,dO add dl,dl,dl 

l£ - — » add dO,dl,d!0 add d2,d2,d2 add d3,d3,d3 tfr d!0,d7 

IP — * add dl0,d2,d6 tfrd0,d4 move.f (rl),d5 

J,1 — *add d6,d3,d0 moves. 4f d4 :d5 :d6 :d7 , (rl) 
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IB(lnstruction Bus, 128) 
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is 3 



xl(1)=x(n)/2 



xl( 1 )+xl(3)=xl( 1 )+a, , *w, (n-1 ) 
xK^b^w^n-l) 



xl(5)=xl(1)+xl(3)+a 12 *w 1 (n-2) 
xl(9)=xl(7)+b 12 *w 2 (n-1) 
xl(12)=a 21 > 2 (n-1) 
xl(16)=b 21 *w 2 (n-1) 



xl(13)=xl(12)+£^ 2 *w 2 (n-2) 
xl(18)=xl(16)+b 22 *w 2 (n-2) 
xl(6)=xl(5)*2 
xl(9)*2 



I 



xl(10)*2=xl(6)+xl(9)*2 
xl(13)*2 
xl(18)*2 
w 2 (n-2) new =xs(4)=w 2 (n-1) 



11 



1* 



xl(1 5)=xl(14)*2=xl(1 0)*2+xl(1 3)*2 
w 2 (n-1) new =xs(3)=xl(10r2+xl(13r2 
w l (n-1) new =xs(1)=xl(6) 



y(n)=xl(20)=xl(14)*2+xl(1 8)*2 
save w^n-l^.w^n^)^, 
w 2 (n-1) new ,w 2 (n-2) 

new 
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fr© -» asr dO.dO move.4f (rO)+,d4:d5:d6:d7 move.4f (rl)+.d8:d9:dl0:dl 1 

macd7,d9,d0 mpyd5,d8,d3 tfrd8,d9 move.! (rl),d2 move.4f (K)),dl2:dl3:dl4:dl5 

64-« macd6,d8,d0 mac dl4,dl0,d2 mac dl5,dl0,d3 mpy dl3.dl l.dl tfrarl.rO 
0^ -> add d0,d0,d8 addd0,d2,d2 mac dl2,dlO,dl tfrdl0.dll suba#8,rO 
C^-* addd2,dl,d0 addd2,d2,dl0 macd4.d8,d3 
TG~* adddO.dO.dO move.l d3,(rl) moves.4f d8:d9:dlO:dl l,(rO) 
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xl(18) 
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a 22 
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W2(n-2) ]— 



xl(17) 



Pl<S. ^ 



xl(1)=x(n)/2 



I 



xl(1)+xl(2)=xl(1)+a )2 *w 1 ( n -2) 
xl(8)=b 12 * Wl (n-1) 

w^n^fw^n-l) 



xl(5)=xl( 1 )+xl(2)+a, , *w, (n-1 ) 
S_L(n)+xl(13)=S_L(n)+^*w 2 (n-1) 

xl(10)=xl(8)+a z2 *w 2 ( n - 1 ) 
xl(17)=w 2 (n-2rb2 2 



T 



xl(6)=2*xl(5) 
Wi(n-D new =2*xl(5) 
xl(14)=S_L(n)+xl(13)+xl(5) 
xl(18)=xl(17)+b 21 *w 2 (n-1) 
w 2 (n-2) new =w 2 (n-1) 



Ml 



xl(19)=xl(14)+xl(18) 
w 2 (n-D new =xl(14r2 
S_L(n)^=xl(1 1 )=xl(1 0)+b„* Wl (n-1 ) n , 



y(n)=xl(20)=xl(19)*2 
Save SJ-fn^, 

W l( n - 1 )new. W l( n - 2 )new. 
W 2( n - 1 )neW W 2( n - 2 )new 



